% 计算单位线路附加阻力 N/kN（坡度、曲线）隧道暂时没考虑
function unit_lineforce = cal_unit_lineResist(pos,GradientData,CurveData)
grd = inquire_linedata(pos, GradientData);
crv = inquire_linedata(pos, CurveData);
ug = grd; %单位坡道阻力就是坡度千分数
if crv ~= 0
    uc = 600 / abs(crv);
else
    uc = 0;
end
unit_lineforce = ug + uc;
